/*  srmdnchk.cpp  by K.Tsuru  */
// function ID = 803  BRADIX
/***********************
SRational class
It checks den > 0 or not.
************************/
#ifndef SN_H
#include "sn.h"
#endif
void SRational::DenCheck(){
    if(den.Sign(81) == 0 ) den.SetError(den.DIVIDED_BY_ZERO,"SR", 803);
    if(den.Sign() < 0){
        den.ChangeSign();   // den = -den
        num.ChangeSign();   // num = -num
    }
    if(den.IsOne()) reduceDone = true;
}